--[[
    编码: JX-29-14
    名称: 盘点容器货品明细-盘点任务完成
    作者：HAN  
    日期：2025-1-29

    级别：项目
    
    函数： SetCountTaskFinish
    功能:
        -- 创建 【盘点回库】作业    

    更改记录:
        V2.0 HAN 20250210
             任务完成后刷新改进
--]]

jx_base= require( "jx_base" )
wms_count= require( "wms_count" )

function SetCountTaskFinish ( strLuaDEID ) 
    local nRet, strRetInfo

    m3.PrintLuaDEInfo(  strLuaDEID )
    local runtime_parameter
    nRet, runtime_parameter = m3.GetRuntimeParam(strLuaDEID)
    if ( nRet ~= 0 ) then lua.Error( strLuaDEID, debug.getinfo(1), "GetRuntimeParam失败! "..runtime_parameter ) end
    -- 获取【组盘输入】面板的参数
    local parameter
    nRet, parameter = m3.GetRuntimePanel_InputParamter( strLuaDEID, runtime_parameter.panel, "盘点输入" )
    if ( nRet == 1 ) then 
        mobox.setInfo( strLuaDEID, "没有定义'盘点输入'面板参数!")
        return 
    end

    if ( nRet ~= 0 ) then lua.Error( strLuaDEID, debug.getinfo(1), parameter ) end 
    if ( parameter == nil ) then return end
    local id = parameter.id             -- 当前点中的盘点任务标识（Count_CG_Detail）
    local cc_no = parameter.cc_no       -- 当前点中的盘点任务所属盘点容器流水号
    if ( cc_no == nil or cc_no == "") then
        mobox.setInfo( strLuaDEID, "'盘点输入'面板必须有盘点容器流水号参数!")
        return         
    end
    -- 获取 实际盘点数量
    nRet, strRetInfo = mobox.getCurEditDataObjAttr( strLuaDEID, "F_ACT_QTY" ) 

    if ( nRet ~= 0 )  then lua.Error( strLuaDEID, debug.getinfo(1), "获取当前编辑属性失败! "..strRetInfo ) end 
    local obj_attrs = json.decode( strRetInfo ) 
    local acc_qty = lua.Get_NumAttrValue( obj_attrs[1].value )  
    if ( acc_qty < 0 ) then
        mobox.setInfo( strLuaDEID, "盘点数量不能为负数!")
        return         
    end
  
    -- 设置【盘点容器货品明细】状态 = 2（已盘点）
    local strCondition = "S_ID = '"..id.."'"
    local strUpdateSql = "N_B_STATE = 2, F_ACT_QTY = "..acc_qty
    nRet, strRetInfo = mobox.updateDataAttrByCondition( strLuaDEID, "Count_CG_Detail", strCondition, strUpdateSql )
    if ( nRet ~= 0 ) then  lua.Error( strLuaDEID, debug.getinfo(1), "更新【盘点容器货品明细】信息失败!"..strRetInfo ) end  


    -- 检查一下当前料箱的盘点任务是否已经全部完成，如果完成就创建一个【盘点回库】作业
    -- N_B_STATE = 1 表示未执行的盘点任务  这里 parameter.count_no 就是盘点单号
    strCondition = "S_CNTR_CODE = '"..parameter.cntr_code.."' AND N_B_STATE = 1 AND S_COUNT_NO = '"..parameter.count_no.."'"       
    nRet, strRetInfo = mobox.getDataObjCount( strLuaDEID, "Count_CG_Detail", strCondition )
    if ( nRet ~= 0 ) then lua.Error( strLuaDEID, debug.getinfo(1), strRetInfo ) end 
    local nCount = lua.StrToNumber( strRetInfo )  

    -- V2.0
    -- 当前容器中的已经不存在未盘点的盘点任务
    local action = {
        {
            action_type = "refresh_master_panel",
            value = {
                sub_page = {"当前任务","未执行任务"}
            }
        },
        {
            action_type = "set_dlg_attr",
            value = {  
                        { attr = "UPC", value = "", enable = true, prompt = "请扫商品条码..."  },
                        { attr = "S_CNTR_CODE", value = "", enable = false },
                        { attr = "S_CELL_NO", value = "", enable = false },
                        { attr = "S_ITEM_CODE", value = "", enable = false },
                        { attr = "F_QTY", value = "", enable = false },
                        { attr = "F_ACT_QTY", value = "", enable = false },
                        { attr = "S_ITEM_NAME", value = "", enable = false }
                    }       
        },
        {
            action_type = "refresh_related_panel",
            value = {  
                        {
                            panel_name = "料格显示",
                            input_parameter = {
                                cell_no = ""
                            }
                        }  
                     }       
        }         
    }    

    local operation = {}    
    if ( nCount == 0 ) then
        -- 创建【料箱入库】作业. 【配盘容器】状态改为4（拣货完成）， CG_Detail 减去【配盘容器明细】中的内容
        local ext_info = { cc_no = cc_no }
        nRet, operation = jx_base.Create_StorageOperation( strLuaDEID, "巨沃", parameter.station, parameter.cntr_code, "盘点回库", ext_info )
        if ( nRet ~= 0 ) then
            mobox.setInfo( strLuaDEID, operation )
            return
        end  
       
        -- 【计划盘点容器】+ 回库作业号, 状态 = 3 （已盘点）
        strUpdateSql = "S_BACK_OP_NO = '"..operation.code.."', N_B_STATE = 3"
        strCondition = "S_CC_NO = '"..cc_no.."'"
        nRet, strRetInfo = mobox.updateDataAttrByCondition( strLuaDEID, "CP_Count_Container", strCondition, strUpdateSql )
        if ( nRet ~= 0 ) then  
            lua.Error( strLuaDEID, debug.getinfo(1), "更新【计划盘点容器】信息失败!"..strRetInfo ) 
        end 
        local cp_cntr  
        nRet, cp_cntr = m3.GetDataObjByCondition( strLuaDEID, "CP_Count_Container", strCondition )
        if ( nRet ~= 0 ) then  
            lua.Error( strLuaDEID, debug.getinfo(1), "获取【计划盘点容器】信息失败!"..cp_cntr ) 
        end  

        --盘点容器盘点完成后数据处理
        --根据 CP_Count_Container 生成 【盘点差异表】
        nRet, strRetInfo = wms_count.CountCntr_PostProcess( strLuaDEID, cp_cntr )
        if ( nRet ~= 0 ) then 
            lua.Error( strLuaDEID, debug.getinfo(1), 'wms_count.CountCntr_PostProcess 失败!'..strRetInfo ) 
        end 


        -- V2.0
        action[4] = {
            action_type = "set_master_panel_cursor",
            value = { form_name = "3055 TOP VIEW", ctrl_id = "S_CNTR_CODE", value = ""}
        }           
    end   

    nRet, strRetInfo = mobox.setAction( strLuaDEID, lua.table2str(action) )
    if ( nRet ~= 0 ) then lua.Error( strLuaDEID, debug.getinfo(1), "setAction失败! "..strRetInfo..' action = '..strAction ) end 

    -- 【注意】如果上面的程序有产生回库作业，需要对回库作业的终点货位加入库锁
    if  ( nCount == 0 ) then
        nRet, strRetInfo = wms.wms_LockLocation(strLuaDEID, operation.end_loc_code, wms_base.Get_nConst( strLuaDEID, "锁类型-入库锁" ),
                                                "", operation.code, operation.op_def_name )
        if (nRet ~= 0) then lua.Error( strLuaDEID, debug.getinfo(1), "wms_LockLocation 失败!"..strRetInfo ) end     
    end   

end